home *** CD-ROM | disk | FTP | other *** search
/ Mastering Web Site Development / Microsoft Mastering Web Site Development (Microsoft) (1997).iso / Labs / Lab08 / addclass.asp next >
Encoding:
Text File  |  1997-04-24  |  1.2 KB  |  43 lines
  1. <%@ LANGUAGE="VBSCRIPT" %>
  2.  
  3. <HTML>
  4. <HEAD>
  5. <meta name="GENERATOR" content="Microsoft Developer Studio">
  6. <meta http-equiv="Content-Type"
  7. content="text/html; charset=iso-8859-1">
  8. <title>Class Registration</title>
  9. <link rel="STYLESHEET" href="Stylesheets/Grid/Style2.css">
  10. </head>
  11.  
  12. <body background="Images/Grid/Background/Back2.jpg"
  13. bgcolor="White">
  14. <basefont face="Arial, Helvetica, sans-serif">
  15.  
  16.  
  17. <table width="100%" border="0" cellspacing="0" cellpadding="0">
  18.     <tr>
  19.         <th align="Left" nowrap bgcolor="Silver"
  20.         background="./Images/Grid/Navigation/Nav1.jpg"> <font
  21.         size="6"> Class Registration </font> </th>
  22.     </tr>
  23.     <tr>
  24.         <td bgcolor="#FFFFCC"> <font size="-1">  
  25.         Add a Class</font> </td>
  26.     </tr>
  27. </table>
  28.  
  29.  
  30. <%    lngStudentID = session("id")
  31.     strClassID = request("classid")
  32.  
  33.     If errEnrollment = 1 Then
  34.         response.write "An error occurred and the class could not be added. Be sure that you are using a valid student ID and that you are not already enrolled in the class."
  35.         response.end
  36.     End If
  37.  
  38.  
  39. %>
  40. Student <%=lngStudentID%> has been added to class <%=strClassID%>
  41. </BODY>
  42. </HTML>
  43.